home *** CD-ROM | disk | FTP | other *** search
/ PCMania 40 / PCMania CD40_1.iso / render40 / oca_a / mechero.inc < prev    next >
Text File  |  1995-10-26  |  655b  |  38 lines
  1. #declare BASE = cylinder {
  2.   <0,0,1>, <0,0,0>, 1
  3.   texture {
  4.     Mechero
  5.   }
  6.   scale <0.7, 0.7, 0.6>
  7. }
  8.  
  9. #declare CUERPO = cone {
  10.   <0,0,0>, 0
  11.   <0,0,1>, 1
  12.   texture {
  13.     Mechero
  14.   }
  15.   scale <0.69, 0.69, 0.7>
  16.   rotate <0, -180, 0>
  17.   translate <0, 0, 1.3>
  18. }
  19.  
  20. #declare CABEZA = cylinder {
  21.   <0,0,1>, <0,0,0>, 1
  22.   open
  23.   texture {
  24.     Mechero
  25.   }
  26.   scale <0.3, 0.3, 0.35>
  27.   translate <0, 0, 1>
  28. }
  29. #declare MECHERO = merge {
  30.   object { BASE }
  31.   object { CUERPO }
  32.   object { CABEZA }
  33.   scale <.5, .5, .5>
  34.   translate <-.3, -2, -.43>
  35.   bounded_by{box{<-1, -1, -1> <1, 1, 1> scale <.35, .3, .3> translate <-.25, -2, 0>}
  36.   }
  37. }
  38.